﻿Public Class frmListarPromociones
    ' jhan
    Dim listaPromociones As New LinkedList(Of Promocion)

    Public Property ListaPromocionesTotales As LinkedList(Of Promocion)
        Get
            Return listaPromociones
        End Get
        Set(ByVal value As LinkedList(Of Promocion))
            listaPromociones = value

        End Set
    End Property
    Private Sub frmListarPromociones_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'For Each mypromociones As Promocion In listaPromociones
        '    Dim item As ListViewItem
        '    item = Me.ListView1.Items.Add(New ListViewItem(mypromociones.Codigo, 0))
        '    item.SubItems.Add(mypromociones.Precio)
        '    item.SubItems.Add(mypromociones.PrecioV)
        '    item.SubItems.Add(mypromociones.Descipcion)
        'Next
        Dim conexion As New Conexion
        conexion.LlenarListaPromocion(Me.ListView1)
    End Sub

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

    End Sub
End Class